home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1992-02-04 | 891 b |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
| 100%
| file
| Emacs v18 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| gt2
| Kopftext: '(defun uncompress-while-visiting nil '
| default (weak)
| |
| 100%
| xdgMime
| text/x-emacs-lisp
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0a 28 64 65 66 75 6e 20 | 75 6e 63 6f 6d 70 72 65 |.(defun |uncompre|
|00000010| 73 73 2d 77 68 69 6c 65 | 2d 76 69 73 69 74 69 6e |ss-while|-visitin|
|00000020| 67 20 6e 69 6c 20 22 5c | 0a 54 65 6d 70 6f 72 61 |g nil "\|.Tempora|
|00000030| 72 79 20 5c 22 6d 61 6a | 6f 72 20 6d 6f 64 65 5c |ry \"maj|or mode\|
|00000040| 22 20 75 73 65 64 20 66 | 6f 72 20 2e 5a 20 66 69 |" used f|or .Z fi|
|00000050| 6c 65 73 2c 20 74 6f 20 | 75 6e 63 6f 6d 70 72 65 |les, to |uncompre|
|00000060| 73 73 20 74 68 65 20 63 | 6f 6e 74 65 6e 74 73 2e |ss the c|ontents.|
|00000070| 0a 49 74 20 74 68 65 6e | 20 73 65 6c 65 63 74 73 |.It then| selects|
|00000080| 20 61 20 6d 61 6a 6f 72 | 20 6d 6f 64 65 20 66 72 | a major| mode fr|
|00000090| 6f 6d 20 74 68 65 20 75 | 6e 63 6f 6d 70 72 65 73 |om the u|ncompres|
|000000a0| 73 65 64 20 66 69 6c 65 | 20 6e 61 6d 65 20 61 6e |sed file| name an|
|000000b0| 64 20 63 6f 6e 74 65 6e | 74 73 2e 22 20 28 62 79 |d conten|ts." (by|
|000000c0| 74 65 2d 63 6f 64 65 20 | 22 08 3f 3f 85 0a 00 c4 |te-code |".??....|
|000000d0| c5 08 5c 22 85 15 00 c6 | 08 c7 c8 c7 21 4f 21 88 |..\"....|....!O!.|
|000000e0| c9 ca 21 88 c2 19 cb 65 | 64 cc c3 24 29 88 c9 cd |..!....e|d..$)...|
|000000f0| 21 88 ce c2 21 88 cf 20 | 87 22 20 5b 62 75 66 66 |!...!.. |." [buff|
|00000100| 65 72 2d 66 69 6c 65 2d | 6e 61 6d 65 20 62 75 66 |er-file-|name buf|
|00000110| 66 65 72 2d 72 65 61 64 | 2d 6f 6e 6c 79 20 6e 69 |fer-read|-only ni|
|00000120| 6c 20 74 20 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 |l t stri|ng-match|
|00000130| 20 22 5c 5c 2e 5a 24 22 | 20 73 65 74 2d 76 69 73 | "\\.Z$"| set-vis|
|00000140| 69 74 65 64 2d 66 69 6c | 65 2d 6e 61 6d 65 20 30 |ited-fil|e-name 0|
|00000150| 20 6d 61 74 63 68 2d 62 | 65 67 69 6e 6e 69 6e 67 | match-b|eginning|
|00000160| 20 6d 65 73 73 61 67 65 | 20 22 55 6e 63 6f 6d 70 | message| "Uncomp|
|00000170| 72 65 73 73 69 6e 67 2e | 2e 2e 22 20 73 68 65 6c |ressing.|.." shel|
|00000180| 6c 2d 63 6f 6d 6d 61 6e | 64 2d 6f 6e 2d 72 65 67 |l-comman|d-on-reg|
|00000190| 69 6f 6e 20 22 75 6e 63 | 6f 6d 70 72 65 73 73 22 |ion "unc|ompress"|
|000001a0| 20 22 55 6e 63 6f 6d 70 | 72 65 73 73 69 6e 67 2e | "Uncomp|ressing.|
|000001b0| 2e 2e 64 6f 6e 65 22 20 | 73 65 74 2d 62 75 66 66 |..done" |set-buff|
|000001c0| 65 72 2d 6d 6f 64 69 66 | 69 65 64 2d 70 20 6e 6f |er-modif|ied-p no|
|000001d0| 72 6d 61 6c 2d 6d 6f 64 | 65 5d 20 39 29 29 0a 0a |rmal-mod|e] 9))..|
|000001e0| 28 73 65 74 71 20 61 75 | 74 6f 2d 6d 6f 64 65 2d |(setq au|to-mode-|
|000001f0| 61 6c 69 73 74 20 28 63 | 6f 6e 73 20 28 71 75 6f |alist (c|ons (quo|
|00000200| 74 65 20 28 22 5c 5c 2e | 5a 24 22 20 2e 20 75 6e |te ("\\.|Z$" . un|
|00000210| 63 6f 6d 70 72 65 73 73 | 2d 77 68 69 6c 65 2d 76 |compress|-while-v|
|00000220| 69 73 69 74 69 6e 67 29 | 29 20 61 75 74 6f 2d 6d |isiting)|) auto-m|
|00000230| 6f 64 65 2d 61 6c 69 73 | 74 29 29 0a 0a 28 64 65 |ode-alis|t))..(de|
|00000240| 66 75 6e 20 66 69 6e 64 | 2d 63 6f 6d 70 72 65 73 |fun find|-compres|
|00000250| 73 65 64 2d 76 65 72 73 | 69 6f 6e 20 6e 69 6c 20 |sed-vers|ion nil |
|00000260| 22 5c 0a 48 6f 6f 6b 20 | 74 6f 20 72 65 61 64 20 |"\.Hook |to read |
|00000270| 61 6e 64 20 75 6e 63 6f | 6d 70 72 65 73 73 20 74 |and unco|mpress t|
|00000280| 68 65 20 63 6f 6d 70 72 | 65 73 73 65 64 20 76 65 |he compr|essed ve|
|00000290| 72 73 69 6f 6e 20 6f 66 | 20 61 20 66 69 6c 65 2e |rsion of| a file.|
|000002a0| 22 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c4 08 |" (byte-|code "..|
|000002b0| c5 50 21 85 1b 00 08 c5 | 50 89 10 88 c6 08 c1 5c |.P!.....|P......\|
|000002c0| 22 88 65 62 88 c3 89 12 | 88 c1 87 22 20 5b 62 75 |".eb....|..." [bu|
|000002d0| 66 66 65 72 2d 66 69 6c | 65 2d 6e 61 6d 65 20 74 |ffer-fil|e-name t|
|000002e0| 20 65 72 72 6f 72 20 6e | 69 6c 20 66 69 6c 65 2d | error n|il file-|
|000002f0| 65 78 69 73 74 73 2d 70 | 20 22 2e 5a 22 20 69 6e |exists-p| ".Z" in|
|00000300| 73 65 72 74 2d 66 69 6c | 65 2d 63 6f 6e 74 65 6e |sert-fil|e-conten|
|00000310| 74 73 5d 20 34 29 29 0a | 0a 28 73 65 74 71 20 66 |ts] 4)).|.(setq f|
|00000320| 69 6e 64 2d 66 69 6c 65 | 2d 6e 6f 74 2d 66 6f 75 |ind-file|-not-fou|
|00000330| 6e 64 2d 68 6f 6f 6b 73 | 20 28 63 6f 6e 73 20 28 |nd-hooks| (cons (|
|00000340| 71 75 6f 74 65 20 66 69 | 6e 64 2d 63 6f 6d 70 72 |quote fi|nd-compr|
|00000350| 65 73 73 65 64 2d 76 65 | 72 73 69 6f 6e 29 20 66 |essed-ve|rsion) f|
|00000360| 69 6e 64 2d 66 69 6c 65 | 2d 6e 6f 74 2d 66 6f 75 |ind-file|-not-fou|
|00000370| 6e 64 2d 68 6f 6f 6b 73 | 29 29 0a |nd-hooks|)). |
+--------+-------------------------+-------------------------+--------+--------+
